home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 34 / Tiger_Disk_034_1997-01_Tiger-Crew-Disk_de_Side_B.d64 / kleines ende (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  468b  |  12 lines
  1. 10 poke52280,.:poke53281,.:printchr$(147):poke646,5:
  2. 20 fori=0to99: print"[158]>>>>  [129]  [146]en[156]de[150]    [154]  <<<<<    [153]        [145][145][145]  ";
  3. 21 nexti:poke56325,1
  4. 22 fori=0to41:print"       [157][157][157][157]   e n d e               [157]          [145][145][145] ";
  5. 23 nexti:poke56325,58:poke646,3
  6. 25 fora=1104to1183step.5:pokea,221:forb=22to24step9:poke53270,b:
  7. 30 nextb,a
  8. 40 forj=399to440step.3:poke1025+j,249:
  9. 50 poke55296+j,(rnd(0)*15)
  10. 60 print"[145][145][145]             es ist vorbei!                  " :next
  11. 70 print"[147]                                        ";
  12.